﻿Imports DTO
Imports DAO
Public Class ChiTietBUS
    Dim _chiTietDAO As New ChiTietDAO()

    Public Sub ThemCTHDBUS(ByVal _chiTietDTO As ChiTietDTO)
        _chiTietDAO.ThemCTHDDAO(_chiTietDTO)
    End Sub

    Public Function LoadDanhSachChiTietBUS(ByVal _maHD As Integer) As List(Of ChiTietDTO)
        Return _chiTietDAO.LoadDanhSachChiTietDAO(_maHD)
    End Function

    Public Function LayCTHoaDonBUS(ByVal _maHD As Integer) As DataTable
        Return _chiTietDAO.LayTableCTHoaDonDAO(_maHD)
    End Function

    Public Sub SuaCTHDBUS(ByVal _maCT As Integer, ByVal _soLuong As Integer)
        _chiTietDAO.SuaCTHoaDonDAO(_maCT, _soLuong)
    End Sub
    Public Sub XoaCTHDBUS(ByVal _maCT)
        _chiTietDAO.XoaCTHoaDonDAO(_maCT)
    End Sub
End Class
